home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 029a / pns51.zip / COMMOPNS.MAC < prev    next >
Text File  |  1991-09-30  |  5KB  |  84 lines
  1.  ────────────────────────────────────────────────────────────────────────────
  2.  * * * BEGINNING OF PNS MACROS
  3.  
  4. ╔═════════════════════════════════════════════════════════════════════════════╗ pnsupproto
  5. ║                         Della & Muegge Enterprises'                         ║
  6. ║                          ┤ COMMOPNS Upload Menu ├                           ║
  7. ║                                                                             ║
  8. ║    Hot Key        Selection                     External Program            ║
  9. ╟─────────────────────────────────────────────────────────────────────────────╢
  10. ║    Ctrl-F1        Zmodem batch                  DSZ.COM                     ║ {GOTO PNSz}
  11. ║    Ctrl-F2        Ymodem batch                  DSZ.COM                     ║ {GOTO PNSy}
  12. ║    Ctrl-F3        Ymodem-G batch                DSZ.COM                     ║ {GOTO PNSyg}
  13. ║    Ctrl-F4        MPt batch                     MPT.EXE                     ║ {GOTO PNSp}
  14. ║    Ctrl-F5        Xmodem-1K  (old Ymodem)       N/A     (Internal)          ║ {GOTO PNSxk}
  15. ║    Ctrl-F6        Xmodem                        N/A     (Internal)          ║ {GOTO PNSx}
  16. ║    Ctrl-F7        CIS BPlus (no PNS)            OZBEXT.EXE                  ║ {:CF7} {GOTO PCBS}
  17. ╟─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─╢ {:CPU} {MACRO pnsupproto}
  18. ║                   Edit PNS Macros                                           ║ {GOTO PNSEdit}
  19. ║                   Register PNS                                              ║ {GOTO PNSRegister}
  20. ╚═════════════════════════════════════════════════════════════════════════════╝
  21. COMMOPNS is Shareware.  Print out REGISTER.FRM for information on how to pay.
  22.   ____
  23.  /  o \/| The Babble Underground      Call for the latest versions of
  24. |___,   | (707) 575-0636              {COMMO}, COMMOPNS, and other {COMMO}
  25.  \____/\| USRobotics Dual Standard    Utilities.
  26.  ────────────────────────────────────────────────────────────────────────────   {:PNSEdit} {MACRO PNS Edit}
  27.                                [E] to Edit
  28.  ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─
  29.  ZMODEM BAT {:pnszup} * Auto Zmodem Upload, add "aut=pnszup,^xB01" to COMMO.SET
  30.             {:PNSz}                              * Label menu GOTOs
  31.             {:CF1}                               * HotKey (Control-F1)
  32.             {CALL PNS}                           * execute COMMOPNS
  33.             {EXEC-AW DSZ port %_port sz @%pnsf}  * Protocol Driver
  34.             {GOTO PNSDone}                       * All done clean/up exit
  35.  
  36.  YMODEM BAT {:PNSyb} {:CF2} {CALL PNS} {EXEC-AW DSZ port %_port sb -k @%pnsf} {GOTO PNSDone}
  37.  YMODEM-G   {:PNSyg} {:CF3} {CALL PNS} {EXEC-AW DSZ port %_port sb -k @%pnsf} {GOTO PNSDone}
  38.  MPT        {:PNSp}  {:CF4} {CALL PNS} {EXEC-AW MPT P%p s @%pnsf}             {GOTO PNSDone}
  39.  XMODEM 1K  {:PNSxk} {:CF5} {CALL PNS} {CALL PNSGetName} {SXMO-KAW %PNSUpf}   {GOTO PNSDone}
  40.  XMODEM CRC {:PNSx}  {:CF6} {CALL PNS} {CALL PNSGetName} {SXMO-AW %PNSUpf}    {GOTO PNSDone}
  41.  ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─
  42. * The program COMMOPNS.EXE, DSZ.COM(or DSZ.EXE), and MPT.EXE must be in your *
  43. * DOS PATH.  The '@' and drive specifier MUST be included, OR DSZ won't work.*
  44.  ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─     PNS Filename Setup
  45. {:PNS}  {SETV pnsf,C:\FILE.LST}
  46.                    ^^^^^^^^^^^
  47.                    Configurable, file to put tagged file list.
  48.  
  49.         {EXEC COMMOPNS %pnsf -ON -D%uldir -S%_speed}
  50.             * The -ON Sort files by filename.
  51.             * The -D option to specify in which directory to start.
  52.             * The -S option to specify the bps rate.
  53.  
  54.         {IFEX %pnsf,,PNSD}
  55.         {RETURN}
  56.  
  57. {:PNSGetName}  * For internal Xmodem protocols
  58.         {ROPEN %pnsf,PNSG}
  59.         {READ %PNSUpf}
  60.         {RCLOSE}
  61. {:PNSG} {RETURN}
  62.  
  63. {:PNSDone}
  64.         {EXEC ERASE %pnsf}
  65. {:PNSD} {SETV pnsf}
  66.         {SETV PNSUpf}
  67.         {}
  68.  
  69. {:PNSRegister}
  70.         {SPOC N} {CLEAR} {DISP 2,1,6a,COMMOPNS Registration}
  71.         {DISP 4,1,07,Use underlines instead of spaces in your name.  (i.e. John_Doe)}
  72.         {DISP 5,1,07,Registration Name: }  {GETS PNSname,30,PNSR20}
  73.         {DISP 6,1,07,Serial Number: }      {GETS PNSserial,4,PNSR20}
  74.         {DISP 7,1,07,Activation Code: }    {GETS PNScode,5,PNSR20}
  75.         {EXEC-W COMMOPNS -R%PNSserial %PNScode %PNSname}
  76.         {SETV PNSSerial}  {SETV PNScode}  {SETV PNSname}
  77. {:PNSR20}
  78.         {CLEAR}
  79.         {MACRO}
  80.  
  81.  * * * END OF PNS MACROS
  82.  ────────────────────────────────────────────────────────────────────────────
  83.  
  84.